/ CD Loisirs 2 / CD Loisirs 02 / CD Loisirs CD 002.mdf / mac / Distortion / 1 / 1.rsrc / VWFI_1024

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 10 00 16 1f 38 | 00 00 00 00 00 00 00 20 |.......8|....... |
|00000010| 00 07 00 00 00 00 00 00 | 06 3a 00 00 06 3a 00 00 |........|.:...:..|
|00000020| 06 5f 00 00 06 5f 00 00 | 06 61 00 00 06 61 00 00 |._..._..|.a...a..|
|00000030| 06 61 6f 6e 20 51 49 6e | 69 74 0d 20 20 67 6c 6f |.aon QIn|it.  glo|
|00000040| 62 61 6c 20 45 41 51 75 | 69 74 0d 20 20 73 65 74 |bal EAQu|it.  set|
|00000050| 20 45 41 51 75 69 74 20 | 3d 20 22 51 75 69 74 22 | EAQuit |= "Quit"|
|00000060| 0d 20 20 0d 6f 6e 20 42 | 54 6f 67 0d 20 20 67 6c |.  .on B|Tog.  gl|
|00000070| 6f 62 61 6c 20 54 4f 47 | 0d 20 20 73 65 74 20 78 |obal TOG|.  set x|
|00000080| 20 3d 20 74 68 65 20 6c | 6f 63 48 20 6f 66 20 73 | = the l|ocH of s|
|00000090| 70 72 69 74 65 20 32 31 | 0d 20 20 70 75 70 70 65 |prite 21|.  puppe|
|000000a0| 74 73 70 72 69 74 65 20 | 32 31 2c 20 31 0d 20 20 |tsprite |21, 1.  |
|000000b0| 70 75 70 70 65 74 73 70 | 72 69 74 65 20 32 32 2c |puppetsp|rite 22,|
|000000c0| 20 31 0d 20 20 70 75 70 | 70 65 74 73 70 72 69 74 | 1.  pup|petsprit|
|000000d0| 65 20 32 33 2c 20 31 0d | 20 20 70 75 70 70 65 74 |e 23, 1.|  puppet|
|000000e0| 73 70 72 69 74 65 20 32 | 34 2c 20 31 0d 20 20 0d |sprite 2|4, 1.  .|
|000000f0| 20 20 69 66 20 54 4f 47 | 20 3d 20 30 20 74 68 65 |  if TOG| = 0 the|
|00000100| 6e 0d 20 20 20 20 73 65 | 74 20 54 4f 47 20 3d 20 |n.    se|t TOG = |
|00000110| 31 0d 20 20 20 20 73 65 | 74 20 74 68 65 20 4c 6f |1.    se|t the Lo|
|00000120| 63 56 20 6f 66 20 73 70 | 72 69 74 65 20 32 31 20 |cV of sp|rite 21 |
|00000130| 3d 20 33 34 32 0d 20 20 | 20 20 73 65 74 20 74 68 |= 342.  |  set th|
|00000140| 65 20 4c 6f 63 56 20 6f | 66 20 73 70 72 69 74 65 |e LocV o|f sprite|
|00000150| 20 32 32 20 3d 20 33 34 | 32 0d 20 20 20 20 73 65 | 22 = 34|2.    se|
|00000160| 74 20 74 68 65 20 4c 6f | 63 56 20 6f 66 20 73 70 |t the Lo|cV of sp|
|00000170| 72 69 74 65 20 32 33 20 | 3d 20 33 34 32 0d 20 20 |rite 23 |= 342.  |
|00000180| 20 20 73 65 74 20 74 68 | 65 20 4c 6f 63 56 20 6f |  set th|e LocV o|
|00000190| 66 20 73 70 72 69 74 65 | 20 32 34 20 3d 20 33 34 |f sprite| 24 = 34|
|000001a0| 32 0d 20 20 65 6c 73 65 | 0d 20 20 20 20 73 65 74 |2.  else|.    set|
|000001b0| 20 54 4f 47 20 3d 20 30 | 0d 20 20 20 20 73 65 74 | TOG = 0|.    set|
|000001c0| 20 74 68 65 20 4c 6f 63 | 56 20 6f 66 20 73 70 72 | the Loc|V of spr|
|000001d0| 69 74 65 20 32 31 20 3d | 20 34 32 32 0d 20 20 20 |ite 21 =| 422.   |
|000001e0| 20 73 65 74 20 74 68 65 | 20 4c 6f 63 56 20 6f 66 | set the| LocV of|
|000001f0| 20 73 70 72 69 74 65 20 | 32 32 20 3d 20 34 32 32 | sprite |22 = 422|
|00000200| 0d 20 20 20 20 73 65 74 | 20 74 68 65 20 4c 6f 63 |.    set| the Loc|
|00000210| 56 20 6f 66 20 73 70 72 | 69 74 65 20 32 33 20 3d |V of spr|ite 23 =|
|00000220| 20 34 32 32 0d 20 20 20 | 20 73 65 74 20 74 68 65 | 422.   | set the|
|00000230| 20 4c 6f 63 56 20 6f 66 | 20 73 70 72 69 74 65 20 | LocV of| sprite |
|00000240| 32 34 20 3d 20 34 32 32 | 0d 20 20 65 6e 64 20 69 |24 = 422|.  end i|
|00000250| 66 0d 20 20 0d 6f 6e 20 | 46 65 65 64 4a 75 6d 70 |f.  .on |FeedJump|
|00000260| 20 62 2c 20 62 6d 2c 20 | 66 2c 20 66 6d 0d 20 20 | b, bm, |f, fm.  |
|00000270| 67 6c 6f 62 61 6c 20 4a | 42 61 63 6b 2c 20 4a 46 |global J|Back, JF|
|00000280| 6f 72 65 2c 20 4d 42 61 | 63 6b 2c 20 4d 46 6f 72 |ore, MBa|ck, MFor|
|00000290| 65 0d 20 20 73 65 74 20 | 4a 42 61 63 6b 20 3d 20 |e.  set |JBack = |
|000002a0| 62 0d 20 20 73 65 74 20 | 4d 42 61 63 6b 20 3d 20 |b.  set |MBack = |
|000002b0| 62 6d 0d 20 20 73 65 74 | 20 4a 46 6f 72 65 20 3d |bm.  set| JFore =|
|000002c0| 20 66 0d 20 20 73 65 74 | 20 4d 46 6f 72 65 20 3d | f.  set| MFore =|
|000002d0| 20 66 6d 0d 20 20 0d 6f | 6e 20 47 6f 42 61 63 6b | fm.  .o|n GoBack|
|000002e0| 0d 20 20 67 6c 6f 62 61 | 6c 20 4a 42 61 63 6b 2c |.  globa|l JBack,|
|000002f0| 20 4d 42 61 63 6b 2c 20 | 54 4f 47 0d 20 20 73 65 | MBack, |TOG.  se|
|00000300| 74 20 54 4f 47 20 3d 20 | 30 0d 20 20 69 66 20 4a |t TOG = |0.  if J|
|00000310| 42 61 63 6b 20 3d 20 22 | 4d 61 69 6e 4d 65 6e 75 |Back = "|MainMenu|
|00000320| 22 20 74 68 65 6e 0d 20 | 20 20 20 67 6f 20 22 4d |" then. |   go "M|
|00000330| 65 6e 75 22 20 6f 66 20 | 6d 6f 76 69 65 20 22 31 |enu" of |movie "1|
|00000340| 22 0d 20 20 20 20 65 78 | 69 74 0d 20 20 65 6c 73 |".    ex|it.  els|
|00000350| 65 20 69 66 20 4d 42 61 | 63 6b 20 3d 20 31 20 74 |e if MBa|ck = 1 t|
|00000360| 68 65 6e 0d 20 20 20 20 | 67 6f 20 6d 6f 76 69 65 |hen.    |go movie|
|00000370| 20 4a 62 61 63 6b 0d 20 | 20 65 6c 73 65 20 69 66 | Jback. | else if|
|00000380| 20 4d 42 61 63 6b 20 3d | 20 30 20 74 68 65 6e 0d | MBack =| 0 then.|
|00000390| 20 20 20 20 67 6f 20 4a | 42 61 63 6b 0d 20 20 65 |    go J|Back.  e|
|000003a0| 6c 73 65 20 0d 20 20 20 | 20 67 6f 20 4a 42 61 63 |lse .   | go JBac|
|000003b0| 6b 20 6f 66 20 6d 6f 76 | 69 65 20 4d 42 61 63 6b |k of mov|ie MBack|
|000003c0| 0d 20 20 65 6e 64 20 69 | 66 0d 20 20 0d 6f 6e 20 |.  end i|f.  .on |
|000003d0| 47 6f 46 6f 72 65 0d 20 | 20 67 6c 6f 62 61 6c 20 |GoFore. | global |
|000003e0| 4a 46 6f 72 65 2c 20 4d | 46 6f 72 65 2c 20 54 4f |JFore, M|Fore, TO|
|000003f0| 47 0d 20 20 73 65 74 20 | 54 4f 47 20 3d 20 30 0d |G.  set |TOG = 0.|
|00000400| 20 20 69 66 20 4a 46 6f | 72 65 20 3d 20 22 4d 61 |  if JFo|re = "Ma|
|00000410| 69 6e 4d 65 6e 75 22 20 | 74 68 65 6e 0d 20 20 20 |inMenu" |then.   |
|00000420| 20 67 6f 20 22 4d 65 6e | 75 22 20 6f 66 20 6d 6f | go "Men|u" of mo|
|00000430| 76 69 65 20 22 31 22 0d | 20 20 20 20 65 78 69 74 |vie "1".|    exit|
|00000440| 0d 20 20 65 6e 64 20 69 | 66 0d 20 20 69 66 20 4d |.  end i|f.  if M|
|00000450| 46 6f 72 65 20 3d 20 31 | 20 74 68 65 6e 0d 20 20 |Fore = 1| then.  |
|00000460| 20 20 67 6f 20 6d 6f 76 | 69 65 20 4a 46 6f 72 65 |  go mov|ie JFore|
|00000470| 0d 20 20 65 6c 73 65 20 | 69 66 20 4d 46 6f 72 65 |.  else |if MFore|
|00000480| 20 3d 20 30 20 74 68 65 | 6e 0d 20 20 20 20 67 6f | = 0 the|n.    go|
|00000490| 20 4a 46 6f 72 65 0d 20 | 20 65 6c 73 65 20 0d 20 | JFore. | else . |
|000004a0| 20 20 20 67 6f 20 4a 46 | 6f 72 65 20 6f 66 20 6d |   go JF|ore of m|
|000004b0| 6f 76 69 65 20 4d 46 6f | 72 65 0d 20 20 65 6e 64 |ovie MFo|re.  end|
|000004c0| 20 69 66 0d 20 20 0d 6f | 6e 20 41 4a 20 78 0d 20 | if.  .o|n AJ x. |
|000004d0| 20 67 6c 6f 62 61 6c 20 | 43 6f 75 6e 74 72 0d 20 | global |Countr. |
|000004e0| 20 73 65 74 20 63 6f 75 | 6e 74 72 20 3d 20 63 6f | set cou|ntr = co|
|000004f0| 75 6e 74 72 2b 31 0d 20 | 20 69 66 20 78 20 3d 20 |untr+1. | if x = |
|00000500| 31 20 74 68 65 6e 0d 20 | 20 20 20 69 66 20 63 6f |1 then. |   if co|
|00000510| 75 6e 74 72 20 3e 20 31 | 32 20 74 68 65 6e 0d 20 |untr > 1|2 then. |
|00000520| 20 20 20 20 20 73 65 74 | 20 63 6f 75 6e 74 72 20 |     set| countr |
|00000530| 3d 20 30 0d 20 20 20 20 | 20 20 67 6f 20 6d 61 72 |= 0.    |  go mar|
|00000540| 6b 65 72 28 31 29 0d 20 | 20 20 20 20 20 65 78 69 |ker(1). |     exi|
|00000550| 74 0d 20 20 20 20 65 6e | 64 20 69 66 0d 20 20 65 |t.    en|d if.  e|
|00000560| 6e 64 20 69 66 0d 20 20 | 69 66 20 69 6e 74 65 67 |nd if.  |if integ|
|00000570| 65 72 70 28 78 29 20 3d | 20 30 20 74 68 65 6e 0d |erp(x) =| 0 then.|
|00000580| 20 20 20 20 69 66 20 63 | 6f 75 6e 74 72 20 3e 20 |    if c|ountr > |
|00000590| 31 30 20 74 68 65 6e 0d | 20 20 20 20 20 20 73 65 |10 then.|      se|
|000005a0| 74 20 63 6f 75 6e 74 72 | 20 3d 20 30 0d 20 20 20 |t countr| = 0.   |
|000005b0| 20 20 20 67 6f 20 78 0d | 20 20 20 20 20 20 65 78 |   go x.|      ex|
|000005c0| 69 74 0d 20 20 20 20 65 | 6e 64 20 69 66 0d 20 20 |it.    e|nd if.  |
|000005d0| 65 6e 64 20 69 66 0d 20 | 20 69 66 20 78 20 3d 20 |end if. | if x = |
|000005e0| 36 20 74 68 65 6e 0d 20 | 20 20 20 67 6f 20 6d 61 |6 then. |   go ma|
|000005f0| 72 6b 65 72 28 31 29 0d | 20 20 20 20 72 65 73 65 |rker(1).|    rese|
|00000600| 74 43 0d 20 20 20 20 65 | 78 69 74 0d 20 20 65 6e |tC.    e|xit.  en|
|00000610| 64 20 69 66 0d 20 20 67 | 6f 20 6d 61 72 6b 65 72 |d if.  g|o marker|
|00000620| 28 30 29 0d 20 20 0d 6f | 6e 20 49 4a 20 78 0d 20 |(0).  .o|n IJ x. |
|00000630| 20 67 6f 20 78 0d 20 20 | 72 65 73 65 74 43 0d 20 | go x.  |resetC. |
|00000640| 20 0d 6f 6e 20 72 65 73 | 65 74 43 0d 20 20 67 6c | .on res|etC.  gl|
|00000650| 6f 62 61 6c 20 43 6f 75 | 6e 74 72 0d 20 20 73 65 |obal Cou|ntr.  se|
|00000660| 74 20 63 6f 75 6e 74 72 | 20 3d 20 30 24 50 61 74 |t countr| = 0$Pat|
|00000670| 72 69 63 6b 20 4d 69 6c | 6c 69 67 61 6e 20 2d 20 |rick Mil|ligan - |
|00000680| 52 6f 67 65 72 20 45 61 | 73 74 20 44 65 73 69 67 |Roger Ea|st Desig|
|00000690| 6e 00 00                |                         |n..     |        |
+--------+-------------------------+-------------------------+--------+--------+